Move procedure

  DECLARATION:  Move(var Source, Dest; Count : Word);

      PURPOSE:  Copies a specified number of contiguous bytes from a source
                range to a destination range.

         UNIT:  System

      REMARKS:  Source and Dest can be variables of any type.  Count must
                be a word-type expression.  This will copy a block of Count
                bytes from the 1st byte of Source to the 1st byte of Dest.

                NOTE: No error checking is done; be careful!  Use SizeOf
                      function to determine Count.